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f~~'' Abstract 

H, 

•^ . The state sum regular isotopy invariant of links which I introduce in this work 

(-H I is a generalization of the Jones Polynomial. So it distinguishes any pair of links 

which are distinguishable by Jones'. This new invariant, denoted VSE-invariant is 
strictly stronger than Jones': I detected a pair of links which are not distinguished 
by Jones' but are distinguished by the new invariant. The full VSE-invariant has 
3" states. However, there are useful specializations of it parametrized by an integer 
^ ■ k, having 0{n ) = X^^^q Ce) ^ states. The link with more crossings of the pair 

C^ [ which was distinguished by the VSE-invariant has 20 crossings. The specialization 

^T^ ' which is enough to distinguish corresponds to k=2 and has only 801 states, as 

t;;j- ■ opposed to the 2'^^ = 1,048,576 states of the Jones polynomial of the same link. 

^' ; The fun VSE-invariant of it has 3^0 = 3, 486, 784, 401 states. The VSE-invariant is a 

^^ ' good alternative for the Jones polynomial when the number of crossings makes the 
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computation of this polynomial impossible. For instance, for k = 2 the specialization 
of the VSE-invariant of a link with n = 500 crossings can be computed in a few 
minutes, since it has only 2 n^ -|- 1 = 500, 001 states. 

1 Introduction: the VSE-Expansion 

The Jones polynomial, [1] or its equivalent counterpart, Kauffman's bracket [5] does a 
superb job of distinguishing inequivalent knots and links. However, its computation is 
limited to links with a few crossing because there are 2" states to be enumerated and 
evaluated for a link presentation having n crossings. Here I present a practical strategy to 
overcome exponentiability, thereby obtaining useful regular isotopy invariants with only 
a polynomial number of states. 

The strategy which works is a 4-step strengthening of Kauffman's expansion for the 
bracket [5]. The state sum of the VSE-invariant lives in the ring 

n = Z[A,B,F,X,Y,Z,M,o]. 



The first generalization relative to Kauffman's bracket is to use the 2-coloration (shaded 
and white faces) of the link diagram. This permits the distinctions of two kinds of crossing 
XI and X2: the crossing of type XI is the one that going counterclockwise from an 
overpass to an underpass the sweeped region is shaded; otherwise, if this region is white, 
the crossing is of type X2. The two types of crossings enable the definition of 4 variables 
A,B,X,Y) instead of the usual 2 variables A,B, of only 2 of the bracket. A second 
generalization is that the virtual term of the expansion is included, by means of new 
variables F and Z. A third generalization is to introduce a new variable M to control 
the level: to obtain the ^-specialization, this variable is declared to satisfy M'^"''^ = 0. 
Crossings of both types are expanded according to the two rules of Fig. [H 
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Figure 1: The virtual shaded 3-fold expansion 






Note that the bracket expansion corresponds to the particular case M = 1, X = A, 
Y = B and F = Z = 0. In the expansion some graphical bivalent vertices are created. 
Each monomial of a full expansion is the coefficient of a set of m polygons which are 
evaluated by removing the bivalent vertices one by one according to Fig. [21 The term o™ 
replaces the m polygons. Variable o is the loop value. 
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Figure 2: Eliminating bivalent vertices 



In Mathematica, the expansion rules are given by rulel 

rulel = { 
XI [a_, b_, c_, d_] :> M A con [a b] con[c d] + M B con [a d] con[b c] 

+ F con [a c] con[b d] , 



X2[a_, b_, c_, d_] :> M X con [a b] con[c d] + M Y con [a d] con[b c] 

+ Z con [a c] con[b d] 

>; 

The set of three simphfications, ehininating bivalent vertices is 

rule2 = { 

con[a_ b_] con[b_ c_] :> con [a c] , 

con[a_ b_] con[b_ a_] :> con [a a], 

con[a_ a_] :> o 

}; 

Finally, the state sum of a product is simply 

StateSum [product.] := 

Expand [Simplify [(product /. rulel // Expand) //. rule2]] 

2 Invariance under Reidemeister moves 2 and 3 

Reidemeister move 2 can be dealt with by defining 

LeftMove21 = Xl[a, b, f, e] X2[d, e, f, c] ; 
RightMove21 = con [a d] con[b c] ; 
LeftMove22 = X2[a, b, f, e] Xl[d, e, f, c] ; 
RightMove22 = con [a d] con[b c] ; 







Figure 3: The two types of moves 2 

The fourth strengthening relative to Kauffman's bracket is consider each type of ex- 
terior to be a variable Vext, where ext is an encoding of the particular transitions relative 
to each type of exterior. Instead of simply imposing 



LeftMove21 - RightMove21 = 0, LeftMove22 - RightMove22 = 0, 



con\ac\con a 



f,d\con[ac]con[bd\ 



I define 

^ = Vcon[ad]conbc]Con[ad]con[bc] + Vcon[ab]con[cd]Con[ad]con[bc] + Vcc 

and impose 

{LeftMove21 - mghtMove21) n = 0, {LeftMove22 - RightMove22) n = 0. 

Equality must hold for all values of the exterior variables Kon[_ _]con[_ _]• In the state sum, 
each exterior variable has degree at most 1. So, if I take the partial derivatives of the state 
sum relative to each of these variables, the exterior variables disappear. I must impose 
that each such derivative must be zero, thus obtaining a polynomial equation for each 
exterior variables and each move. This scheme using exterior variables is clearly stronger 
than the usual one which does not make use of these variables: any solution of the old 
scheme is a solution for the new scheme but not vice-versa. The six equations coming 
from Reidemeister move 2 are: 

egi := Bo^XM^ + AoXM^ + Ad^YW^ + BoYM^ + FoXM + FoYM + AoZM + 

BoZM - o2 + Fo'^Z = 0, 
ega := AM^Yo^ + AM^Xo^ + BNPYo"^ + FMYd^ + AMZo"^ + BM^Xo + FMXo + 

FZo + BMZo -0 = 0, 
egg := AoXM"^ + BoXM^ + Ao^YM^ + BoYM^ + Fo^XM + FoYM + Bo^ZM + 

AoZM -0 + FoZ = 0, 
eg4 := -o^ + FMoX + AM^oX + BM^o'^X + FMoY + BM^oY + AM^o^Y + AMoZ + 

BMoZ + Fo^Z = 0, 
egg := -o + FMo^X + AM^o^X + BM^o^X + FMoY + AM^oY + BM^o'^Y + FoZ + 

AMoZ + BMo^Z = 0, 
egg := -o + FMoX + AM^oX + BM^o'^X + AM^oY + BM^oY + FMo^Y + FoZ+ 

BMoZ + AMo'^Z = 0. 

Note that due to symmetry, egi and eq^ coincide and there are only 5 distinct relations. 
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con[a d]con[b c] ^ con[a b]con[c d] ^ con[a c]con[b d] 

con [a d] con[b c] con [a b] con[c d] con [a c] con[b d] 

Figure 4: Three types of exteriors for Reidemeister move 2 



Now I do a similar job for move 3. For each such move there are now 15 exterior variables, 
giving rise to 15 equations. For moves 2 and 3 there is a total of 2(3+15)=36 equations 
in the 8 variables, but there are only 27 distinct ones, due to symmetry. The encoding in 
Mathematica of the two types of moves 3 are 



LeftMoveSl = Xl[a, b, h, g] X2[i, e, f, g] X2[h, c, d, i] ; 
RightMoveSl = XI [a, i, h, f] XI [c, g, i, b] X2[h, g, d, e] ; 
LeftMove32 = X2[a, b, h, g] Xl[i, e, f, g] Xl[h, c, d, i] ; 
RightMove32 = X2[a, i, h, f] X2[c, g, i, b] XI [h, g, d, e] ; 

These moves correspond to the situation of Fig. [51 







Figure 5: The two types of moves 3 



3 Obtaining the relevant ideal 

Instead of considering a set of 27 polynomial equations pok = 0, in the spirit of King, 
[9], I take the ideal generated by the left hand side of the system of equations. These 
polynomials generate an ideal, named X^o. Instead of solving the system of polynomial 
equations, I compute a Grobner for the ideal X^o relative to a fixed monomial ordering. 
The VSE-invariant is the normal form T]^{p) of the classes of polynomials p G TZ/X^. If 
p and q are VSE-state sums of two links Lp and Lq which can be transformed one into 
the other by Reidemeister moves 2 and 3, then rjooip) = Vooi^l)- 

3.1 The ideal X^ 

I have written a subroutine in Mathematica to obtain automatically the polynomials rel- 
ative to a given set of moves. The ideal X^o oiTZ = ZlA, B, F, X, Y, Z, M, o] corresponding 
to Reidemeister moves 2 and 3 is 



2^oo = {poh,pol2, . . ■,P0l26,P0l27), 

where 

poll = o{Bo'^XM^ + BoYM^ + BoZM + A{MoX + MY + Z)M + F{M{oX + Y) + Z)-l), 

poh = oIaoXW^ + Ad^YW^ + AoZM + B{MX + MoY + Z)M + F{M{X + oY) + Z)-l), 



pok = o{M{AMX + BMY + F{X + Y) + AZ + BZ) + o{BXM^ + AYM^ + FZ - 1)), 

poh = o{BoXM^ + BYM^ + BZM + A{M{X + Y) + oZ)M + F{M{X + oY) + Z) - 1), 

poh = o\fMoX + FMY + FZ + AM{M{X + oF) + Z) + BM{M{X + Y) + oZ) - 1), 

PoIq = o{A^{M{oX + Y) + Z)M^ + B^{M{oX + Y) + Z)M^ - B{{X'^ + 2oYX + Y^)M^ + 

2{X + Y)ZM + oZ'^-2F{M{X + Y) + oZ))M-A{oX^M^ + oY^M^ + 2XYM'^ + 2XZM + 

2YZM - 2B{MX + MoY + Z)M + oZ'^ - 2F{M{X + Y) + oZ))M + F{Fo -Zo- M{X + 

Y)){MiX + Y) + oZ)), 

polj = oi-A^iMioX + Y) + Z)M^ - B^{M{oX + Y) + Z)M^ + B{{X^ + 2oYX + Y^)M^ + 

2{X + Y)ZM + oZ^-2F{M{X + Y) + oZ))M + A{oX^M^ + oY^M^ + 2XYM^ + 2XZM + 

2YZM -2B{MX + MoY + Z)M + oZ^ -2F{M{X + Y) + oZ))M - F{Fo- Zo- M{X + 

Y)){MiX + Y) + oZ)), 

poh = o{B^{M{oX + Y) + Z)M'^ + A'^o{M{X + oY) + Z)AP-A{M{X + oY) + Z){-2F- 

2BM + o{MX + MoY + Z))M - B{{M{X + oY) + Zf - 2F{M{X + Y) + oZ))M + 

F{F{M{oX + Y) + Z)- {M{X + oY) + Zf)), 

polg = o{-B^{M{oX + Y) + Z)M^-A^o{M{X + oY) + Z)M^ + A{M{X + oY) + Z){-2F- 

2BM + o{MX + MoY + Z))M + B{{M{X + oY) + Zf - 2f\m\x + Y) + oZ))M + 

F((M(X + oY) + Zf - F{M{oX + Y) + Z))), 

poho = o{A^{M{oX + Y) + Z)M^ + B^{M{oX + Y) + Z)M^ - A{oX^M^ + oY^M^ + 

2XYM^ + 2XZM + 2YZM - 2B{M{X + Y) + oZ)M + oZ^ - 2F{M{X + oY) + Z))M - 

B{{M{X + Y) + oZf - 2F{M{X + oY) + Z))M + F{-{X'^ + 2oYX + Y'^)M'^ - 2{X + 

Y)ZM - oZ"^ + Fo{M{X + oY) + Z))), 

pol^^ = o{-A'^{M{oX + Y) + Z)M^ - B'^{M{oX + F) + Z)M'^ + AioX^M"^ + oY^M^ + 

2XYM'^ + 2XZM + 2YZM - 2B{M{X + Y) + oZ)M + oZ^ - 2F{M{X + oY) + Z))M + 

B{{M{X + Y)+ oZf - 2F{M{X + oY) + Z))M + ^((X^ + 2oYX + F^)^^ + 2{X + 

y)ZM + 0^2 - Fo{M{X + oF) + Z))), 

po/i2 = o(52(M(oX + r) + Z)M2 + A2o(M(X + r) + oZ)M2-5((X2 + 2rX + oF2)M2 + 

2(oX + y)ZM + Z2-2F(M(X + or) + Z))M-A(-2F(M(X + r) + oZ)-2SM(M(X + 

y) + oZ) + o((X2 + 2YX + oF2)m2 + 2(oX + Y)ZM + Z2))M + f{-{X'^ + 2FX + 

oy2)M2 - 2{oX + F)ZM - Z^ + F{M{oX + F) + Z))), 

po/i3 = o(-52(M(oX + F) + Z)M2-A2o(M(X + F) + oZ)M2 + 5((X2 + 2FX + oF2)]vf2 + 

2(oX + F)ZM + Z2-2F(M(X + oF) + Z))M + v4(-2F(M(X + r)+oZ)-2SM(M(X + 

r) + oZ) + o((X2 + 2rX + oF2)M2 + 2(oX + y)ZM + Z2))M + F((X2 + 2FX + oF2)M2 + 

2(oX + Y)ZM + Z2 - F{M{pX + F) + Z))), 

po/i4 = o(A2o(M(oX + F) + Z)M2 + B^o{M{oX + Y) + Z)M^ - B{{2XY + o{X^ + 

Y'^))M'^ + 2(X + Y)ZM + oZ"^ - 2F{M{oX + Y) + Z))M - A{-2F{M{oX + Y) + Z) - 

2BM{M{oX + Y) + Z) + o{{2XY+o{X'^+Y'^))M^+2{X+Y)ZM+oZ^))M+F{-{2XY + 

o(X2 + F2))]vf2 _ 2(X + Y)ZM - oZ"^ + Fo[m{oX + Y) + Z))), 

po/i5 = o(-A2o(M(oX + F) + Z)M2 - B^o{M{oX + Y) + Z)M^ + 5((2XF + 0(^2 + 

r2))M2 + 2(X + Y)ZM + oZ2 - 2F{M{oX + Y) + Z))M + ^(-2F(M(oX + F) + Z) - 

2BM{M{oX + Y) + Z) + o{{2XY + o{X^ + Y'^))M'^ + 2{X + Y)ZM + oZ'^))M + F{{2XY + 

o(X2 + r2))]vf2 + 2(X + F)ZM + oZ2 - Fo[m{oX + Y) + Z))), 

po/ie = o{-{M{oX + Y) + Z)F^ + {oX^M^ + Y^M^ + 2XFM2 + 2XZM + 2oFZM - 

2Bo{MoX + MY + Z)M - 2A{M{oX + Y) + Z)M + Z'^)F + M{-M{M{oX + Y) + 

Z)A^ + ((2Xr + o(X2 + r2))]\^2 ^ 2(X + F)ZM - 2Bo{M{oX + F) + Z)M + oZ'^)A - 

B{BMo'^ - MXo - MY - Z)(M(oX + F) + Z))), 



po/i7 = o{-{M{oX + Y) + Z)F^-{2BM + 2AoM-oXM-YM-Z){M{oX + Y) + Z)F + 
M{-M{M{oX + Y) + Z)A^ + {{2XY + o{X^ + Y^))M^ + 2{X + Y)ZM-2B{M{oX + Y) + 
Z)M + oZ^)A + B{{oX^ + 2YX + Y^)M'^ + 2{X + oY)ZM-Bo{M{oX + Y) + Z)M + Z^))), 
pohs = o{{M{oX + Y) + Z)F'^ + {2BM + 2AoM - oXM - YM - Z) {M[oX + F) + Z)F + 
M(M(M(oX + F) + Z)A2 + (_(2Xr + o(X2 + r2))]vf2_2(X + F)ZM + 25(M(oX + y) + 
Z)M-oZ2)A+5(-(oX2+2rX+F2)M2-2(X+or)ZM+fio(M(oX+F) + Z)M-Z2))), 
po/i9 = o{{M{oX + r) + Z)F'^ + {-oX'^M'^ - Y^M"^ - 2XYAP - 2XZM - 2oYZM + 
2Bo{MoX + MY + Z)M + 2A{M{oX + Y) + Z)M - Z^)F + M{M{M{oX + Y) + Z)A^ + 
(-(2Xy + o(X2 + F2))]vf2_2(X + y)ZM + 25o(M(oX + y) + Z)Af-oZ2)yl + 5(5Afo2- 
MXo - MY - Z){M{oX + Y) + Z))), 

po/20 = o{-{M{X + Y) + oZ)F^ + {oX^M^ + Y^M^ + oXYM^ + XYM^ + d^XZM + 
XZM + oYZM + YZM - A{Zo'^ + 2MXo + MYo + MY + Z)M - B{M{2X + oY + Y) + 
(o + 1)Z)M + oZ^)F + M{-M{M{X + Y) + oZ)A^ + ((X^ + 2YX + oY^)M'^ + 2(oX + 
y)ZM - B{M{2X + oY + Y) + {o + l)Z)M + Z^)A + ^((X^ + (o + l)yX + Y'^)M^ + 
(o + 1)(X + Y)ZM - B{M{oX + Y) + Z)M + Z^))), 

po/21 = 0(-(Af (X + OY) + Z)F2 + (0X2 Af2 + oy2^2 ^ o2j5j^yj^^2 ^ xFM^ + oXZAf + 

XZM + oY ZM + Y ZM - A{MYo^ + 2MX0 + Zo + MY + Z)M - B{M{2X + oY + Y) + 
{o+l)Z)M + Z^)F + M{-M{M{X + oY) + Z)A^ + ((M(X + oY) + Z)^ - BM{M{2X + 
oF + F) + (o + 1)Z))A + B{{X + Y){X + oY)M^ + (Fo^ + Xo + X + F)ZA'/ - 5(Af (oX + 
Y) + Z)M + oZ^))), 

P0I22 = o((Af (X + F) + oZ)F2 + (-oX^Af^ _ y2^2 _ oXFAf2 - XFAf2 - o^XZAf - 
XZAf - oFZAf - FZAf + A{Zo^ + 2A4'Xo + AfFo + AfF + Z)M + B{M{2X + oY + 
Y) + {o+ l)Z)M - oZ^)F + M{M{M{X + F) + oZ)A'^ + (-(X^ + 2FX + oY^)M^ - 
2(oX + Y)ZM + B{M{2X + oY + Y) + {o+ l)Z)M - Z^)A + B{-{X'^ + (o + 1)FX + 
F2)Af2 _ (o + 1)(X + F)ZAf + B{m[oX + F) + Z)M - Z^))), 

P0I23 = o{{M{X + oY) + Z)F^ + {-oX^M^ - oY^M^ - o^XYM^ - XYM^ - oXZM - 
XZM - oYZM - YZM + A^MYd^ + 2AfXo + Zo + MY + Z)M + B{M{2X + oY + 
Y) + {o + l)Z)M - Z^)F + M{M{M{X + oY) + Z)A^ + {BM{M{2X + oY + Y) + {o + 
l)Z) - (Af (X + oY) + Zf)A + B{-{X + F)(X + oF)Af2 - (Yo'^ + Xo + X + F)ZA'/ + 
B{M{oX + F) + Z)M - oZ^))), 

pol2i = o(-(Af(X + F) + oZ)F2 + (X^Af^ + oF^Af^ ^ oXFAf^ + XFAf^ + oXZAf + 
XZAf + o^FZAf + FZAf - fi (Zo2 + 2A/rXo + AfFo + AfF + Z) A^ - A(A4'(2X + oF + F) + 
(0+ l)Z)Af + oZ^)F + M{-M{M{X + oY) + Z)A'^ + {{M{X + oY) + Zf - BM{M{Yo^ + 
2X0 + Y) + {o + l)Z))A - B{BMo - MYo - MX - Z)\m{oX + F) + Z))), 
P0I25 = o{{M{X + F) + oZ)F^ + (-X2Af2 - oY'^M^ - oXYM^ - XYM^ - oXZM - 
XZM - o^YZM - YZM + ^(Zo^ + 2AfXo + AfFo + AfF + Z)M + A{M{2X + oY + 
Y) + {o+ l)Z)M - oZ^)F + M{M{M{X + oY) + Z)A^ + {BM{M{J 6^ + 2Xo + F) + 
(o + \)Z) - {M{X + oY) + Zf)A + B{BMo - MYo - MX - Z){M{oX + F) + Z))), 
poke = o{-{M{X + oY) + Z)F'^ + {X'^M^ + Y^M^ + oXYM^ + XYM'^ + oXZM+XZM + 
oYZM + YZM - B{MYo'^ + 2MXo + Zo + MY + Z)M - A{M{2X + oY + Y) + {o + 
1)Z)M + Z^)F + M{-M{M{X + Y) + oZ)A^ + {{X^ + 2YX + oY^)M^ + 2{oX + Y)ZM - 
B{M{2oX+oY+Y) + {o'^ + l)Z)M+Z^)A-B{M{oX+Y) + Z){BMo-Zo-M{X+Y)))), 
pokr = o{{M{X + oY) + Z)F^ + {-X^M^-Y^M^-oXYM^-XYM^-oXZM-XZM- 
oYZM - YZM + B{MYo'^ + 2Af Xo + Zo + AfF + Z)Af + A(Af"(2X + oY + Y) + {o + 
l)Z)Af-Z2)F + Af(Af(Af"(X + F) + oZ)A2 + (-(X2 + 2FX + oF2)Af2-2(oX + F)ZAf + 



B{M{2oX+oY+Y) + {o^ + l)Z)M-Z'^)A+B{M{oX+Y) + Z){BMo-Zo-M{X+Y)))). 
3.2 The Grobner basis Br 
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The Grobner basis B^o for Too relative to the lexicographical order of the monomials with 
variable order vars = {A, B, F, X, Y, Z, M, o} has only 15 polynomials: 

B^ = {pi = Z'^o^ - Zo'^ - Z^o^ + Zo^ - AZ^o^ + AZo"^ + AZ'^o - AZo, 

P2 = -Z^o^ + M^Y^Zo^ + Zo^ - Z'^d^ + M'^Y'^Zo'^ + Zo^ + 2Z^o - 2M^Y^Zo - 2Zo, 

P3 = M^o^Y^ - M^oY^ - AM^o'^ZY^ + AM^oZY^ + M^o^Y^ - M^o^Y^ + QM^o^Z^Y^ - 

GM'^oZ^Y^ + 2Mo^Z^Y - 2Mo^Z^Y - 2Mo^ZY + 2Mo'^ZY - 2o^Z^ - o'^Z^ + 3oZ^ + 

o2 + 2o^Z^ - 2oZ^ - o, 

P4 = Z^o^-MYZ'^o^ + MYo^-Zo^ + M^Y^o^+2MYZ'^o'^+MXo^-MYo^-'iM'^Y'^Zo'^- 

M^Y^o - Z^o - MYZ^o - MXo + SM^Y^Zo + Zo, 

P5 = YZ^o^ - Yo^ - M^Y^o^ + XZ^o^ + YZ^o^ - Xo^ - Yo^ - M^Y'^o^ + XZ^o^ - 

2YZ^o^ - Xd^ + 2Yo'^ + 2M'^Y^o - 2XZ'^o + 2Xo, 

P6 = o^YZ^ - oYZ^ - Mo^Y^Z^ + 2Mo^Y^Z^ - MoY^Z^ - SM^o^Y^Z^ + SM^oY'^Z^ + 

o^XZ^ - oXZ* - o^YZ^ - o^YZ^ + 2oYZ^ + M^o'^Y^Z^ - M^oY^Z^ + Mo'^Y^Z^ - 

Mo^Y^Z^ + 2M^o^Y^Z^ - 2M^oY^Z^ - 2o^XZ^ + 2oXZ^ - o^YZ^ + 2o^YZ^ - oYZ^ - 

M^o^Y^Z + M^oY^Z - Mo'^Y^Z + MoY^Z + M^o^Y^ - M^oY^ + o^X -oX + o^Y - o^Y, 

P7 = -2o^Z^ + 2oZ^ + 2Mo^YZ^ - AMo^YZ^ + 2MoYZ^ + 2o^Z^ - o^Z^ + QM^o^Y^Z^ - 

GM^oY^Z^ - 2M'^o^Y^Z + 2M^oY^Z + 2MoXZ - 2Mo^YZ + AMo^YZ + o^ + M^oX^ + 

M^oY^ -2o + 2M^oXY, 

ps = Fo^ - Zo^ + Fo^ - Zo^ - 2Fo + 2Zo, 

pg = o^YZ^ - oYZ^ - SMo'^Y^Z^ + SMoY^Z^ - Fo'^YZ* + FoYZ^ + ^M'^o'^Y^Z^ - 

SM^oY^Z^ + SFMo^y 2^3 _ sFMoY^Z^ - o^XZ^ + oXZ^ + o^YZ^ - oYZ^ - M^o'^Y^Z^ + 

M^oY^Z^ - SFM^o'^Y^Z^ + 3FM^oY^Z^ - Mo'^Y^Z^ + MoY^Z^ + Fd^XZ^ - FoXZ^ - 

Fd^YZ^ + FoYZ'^ + FM^d^Y^Z - FM^oY^Z + M^d^Y^Z - M^oY^Z + FMo^Y^Z - 

FMoY^Z + o'^XZ - oXZ - 2o^YZ + 2oYZ - FM^d^Y'^ + FM^oY^ - Fd^X + FoX + 

2Fd^Y - 2FoY, 

Pio = o'^X^F^-oX^F^ + o^Y^F^-oY^F^-2o'^XYF^ + 2oXYF^-2o'^X^ZF+2oX^ZF- 

2o^Y^ZF + 2oY^ZF + Ad^XYZF - AoXYZF + d^X'^Z'^ - oX'^Z'^ + d^Y'^Z'^ - oY'^Z'^ - 

2d^XYZ^ + 2oXrz2, 

pi^ = -Fd^ + 5Mo2 - MYo^ + Zo^ + Fo - fiMo + MYo - Zo, 

Pi2 = -FM^d^Y^ + FM^oF^ + M^d^ZY'^ - M'^oZY^ - SM^o^Z^F^ + ?>M^oZ'^Y^ + 

SFM^o^ZF^ _ 2>FM^oZY^ + SMo^Z^F^ _ 3MoZ3f2 + 2FMo^Y'^ - SFMo^Z^Y^ + 

3FMoZ^Y^ - 2FMoY^ - 2Mo^ZY^ + 2MoZY^ - d^Z^Y + oZ^Y + Fd^Z^Y - FoZ^Y + 

d^Y + d^Z'^Y - oZ'^Y -oY- 2Fd^ZY + 2FoZF - Bo^ + Bd^Z^ - BoZ^ + o^XZ^ - oXZ^ + 

Bo - Fo^XZ + FoXZ, 

pi3 = Fo^ - Zo2 + AMo + 5Mo - MXo - MYo, 

Pi4 = 2FM^o^Y^ - 2FM^oY^ - 2M^d^ZY^ + 2M3oZF^ + QM'^d^Z'^Y^ - GM^oZ^Y^ - 

GFM^o'^ZY^ + GFM^oZY^ - GMo^Z^Y^ + GMoZ^Y^ - AFMo^Y^ + QFMo'^Z^Y^ - 

6FMoZ^Y^ + 3FMoY^+AMo^ZY^-3MoZY^+2o'^Z^Y-2oZ'^Y-2Fo^Z^Y+2FoZ^Y- 

2o'^Z^Y + SoZ^Y + oY- 2FMoXY + 2Fo^ZY - AFoZY + 2MoXZY - FMoX^ + AoZ^ + 

BoZ^ + oXZ^ -A0-B0 + 0X + MoX^Z - 2F0XZ, 



Pi5 = AFd^ - BFo^ - FXo2 + FYo^ - AZ6^ + BZ6^ + XZo^ - YZo^ - AFo + BFo + 
FXo - FYo + AZo - BZo - XZo + YZo}. 

This basis is obtained with the Mathematica command 

-Boo = Groe6neri?asis [Too, wars], 

where Too = {poli,pol2, ■ ■ ■ ,^0/265^0/27}. The normal form of a polynomial poly relative 
to the Grobner basis B^o is obtained in Mathematica simply by writing 

?7oo[po/|/_] := PolynomialReduce[poly,Boo,vars\[[l\\] 

This normal form is a regular isotopy invariant of links which generalizes the Jones poly- 
nomial. The VSE-invariant of a link is defined to be the normal form r/oo relative to the 
Grobner basis GB^ applied to the V^S'-£^-state sum of the link. 

3.3 The /c-specializations of the VSE-invariant 

Define Ik = Too U {M*^"*"^} and let B^ be the Grobner basis for 1^ with the same mono- 
mial order as before. I have computed explicitly Bi, B2, ■ ■ ■ , Biq, Bn. They have re- 
spectively 14,25,30,37,44,53,62,73,84,97,110 (not horrendous) polynomials, therefore 
explicit computations via the normal forms are available. The corresponding normal 
forms ?7i,?72, . . . ,?7io,''7ii, . . . are regular isotopy invariants of a link L when applied to 
their VSE-state sum ss{L). The proof of the following proposition is straightforward: 

(3.1) Proposition. The number of non-null states for computing the regular isotopy 
invariant ?7fc(ss(L„)) = r]k{Ln), of a link Ln with n crossings is Yli(.=o (") 2^, for k < n 
and 3" for k > n. 

4 Comparing the VSE-invariant with the bracket 

In this section we present examples of computations of the VSE-invariant on some knots 
and links. It seems, from these examples that the ^Sii^-invariants and the bracket have 
always the same discriminative power. However... see last subsection! For the notation 
on the knots see [1]. 

4.1 Knots 4i and Kllnl9 

The knots 4i and Kllnl9 with with writhes —3 have the same ?7oo invariant. This implies 

that ?7a;(4i) = r]k{Kllnl9) for all integer values A; > 0. 

r^i = -lo(6M(o - 1)Y + Z{AZ^ - 3o{Z^ - 1) - 6)), 

ri2 = \o{Z{VlZ^ - 52^2 + 6o2(Z2 - 1) - 9o[Z^ - AZ^ + 3) + 48) - 24M(o - 1)F), 

r/3 = ^o(Z(12(Z2 - l)o2 + 3(5^6 - 21^^ + 39^^ - 23)o+ 

4(-5Z6 + 21^4 - 41^2 + 29)) - 16M(o - l)Y{2Z'^ + o{Z^ - 1) + 1)), 
r^4 = ^o(Z(24(Z4 + 2^2 - 3)o2 - 3(35^^ - 180^^ + 370^^ - 436^^ + 211)o+ 

4(35ZS - 180^6 + 366Z4 - 444^^ + 255)) - 128M(o - l)Y{2Z^ + o{Z^ - 1) + 1)), 





Figure 6: Jones and VSE-invariant agree on 4i (with write -3) and Kllnl9 



r/oo = o{M^{o^ - 80^ + 210"^ - 20o2 + 6)^^ + QM^{o - l)ZY^ + Z{-{Z^ - iy+ 
{Z^ - 1)0 + 1) + M{X + Y{-{Z^ - ly + 9(^2 - ly - 28(^2 - 1)0^+ 
35(Z2 - l)o3 + (16 - l9Z2)o + 4^2))). 

4.2 Knots Sg and MirrorlOug 

For this pair of knots, the specializations (computed from k=l up to 11) are rather 

insensitive: 

77^,(88) =0 = ?7fc(10i29), fc = 1, 2, . . . , 10, 11. At the 00-level: 

r/oo(88) = o(M2f2o9 _ (^2 - l)o^ - IQM^Y^o'^ + 10(^2 - 1)06 + 35M2F2o5- 

35(^2 - 1)0"^ - 50M2r2o3 ^ 5Q(^2 _ ^^,^2 ^ 24M2r2o - 24^2 + 25) = r/oo(10i29). 



4.3 Knots 942 and Mirror942 

The knots 942 and Mirror 942 are indistinguishable by the Jones invariant, by the Kauff- 
man invariant and by the HOMFLY invariant. The full VSE-invariant also does not 
distinguishes them. As with the previous pair, the specializations collapses to o for k 
from 1 to 11. At A; = 00, 

r/oo(942) = o(-7 + 8^2 - 14o2(-l + ^2) + 7o\-l + ^2) - o%-l + Z^)) = r/oo(Mzrr or 942). 



4.4 Conway and Kinoshita-Terasaka knots and their doubled 

The few states of the specializations of the VSE-invariant for low level of k can be used 
to effectively compute the doubled or tripled of some knots. I have done this for the 
Conway and Kinoshita-Terasaka knots hoping to detect mutation. The hope was not 
fulfilled because for k from 1 to 4 the VSE-specialiazation in these doubled knots are 
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Figure 7: Jones and VSE-invariant agree on Sg (with writhe +2) and MirrorlO 



129 




15 -^Q 15 —8 

Figure 8: Knots 942 and Mirror942'- the 4 invariants agree, the knots are distinct 



the same. Nevertheless the hope persists for a higher level of cabling, by triplication or 
quadruplicating the knots. I show a summary of the computations. The links have each 
44 crossing and is impossible to compute their bracket. For the Conway doubled the 
computations start by encoding the crossings directly from the picture as follows: 

cl = X2[a, hh, abl, adl] XI [v, bcl, abl, h] X2[vv, g, cdl, bcl] 

XI [aa, adl, cdl, gg] ; 
c2 = X2[s, a, ab2, ad2] XI [r, bc2, ab2, aa] X2[rr, bb, cd2, bc2] 

XI [ss, ad2, cd2, b] ; 
c3 = XI [b, ab3, ad3, ss] X2[bb, tt, bc3, ab3] XI [cc, cd3, bc3, t] 
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Conway knot, doubled 




nn 



Picture based on Knotilus K11n34, writhe -1 
Figure 9: Conway knot, doubled 



X2 [c , s , ad3 , cd3] ; 
c4 = X2[tt, ff, ab4, ad4] Xl[ab4, f, uu, bc4] X2[u, e, cd4, bc4] 

XI [t, ad4, cd4, ee] ; 
c5 = XI [qq, ab5, ad5, uu] X2[q, vv, bc5, ab5] XI [p, cd5, bc5, v] 

X2 [pp , u , ad5 , cd5] ; 
c6 = X2[cc, kk, ab6, ad6] XI [dd, bc6, ab6, k] X2[d, j, cd6, bc6] 

XI [c, ad6, cd6, j j] ; 
c7 = Xl[ll, ab7, ad7, e] X2[l, d, bc7, ab7] XI [k, cd7, bc7, dd] 

X2[kk, ee, ad7, cd7] ; 
c8 = X2[g, q, abS, adS] XI [f, bc8, abS, qq] X2[ff, rr, cd8, bc8] 

XI [gg, ad8, cd8, r] ; 
c9 = X2[min, h, ab9, ad9] Xl[ab9, hh, nn, bc9] X2[n, ii, cd9, bc9] 

XI [m, ad9, cd9, i] ; 
clO = X2[p, mm, ablO, adlO] Xl[ablO, m, o, bclO] 

X2[oo, 1, cdlO, bclO] Xl[pp, adlO, cdlO, 11]; 
ell = Xl[i, abll, adll, o] X2[ii, n, bell, abll] 

XI [jj, cdll, bell, nn] X2 [ j , oo, adll, edll] ; 
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doubleConwayAsProduct = cl c2 c3 c4 c5 c6 c7 c8 c9 clO ell; 
doubleConway = new [Link, doubleConwayAsProduct] ; 

Next, the normal forms are computed from the Mathematical command 
sumOfPolynomialNumberOfStates[aLink, k]]] 
which I have implemented: 

\[Eta] IdoubleConway = 
Simplify [ 
Subscript [\ [Eta] , 1] [ 
sumOfPolynomialNumberOf States [doubleConway , 1] ] ] 
\[Eta]2doubleConway = 
Simplify [ 
Subscript [\ [Eta] , 2] [ 
SumOfPolynomialNumberOf States [doubleConway , 2] ] ] 
\ [Eta] SdoubleConway = 
Simplify [ 
Subscript [\ [Eta] , 3] [ 
SumOfPolynomialNumberOf States [doubleConway , 3] ] ] 
\ [Eta] 4doubleConway = 
Simplify [ 
Subscript [\ [Eta] , 4] [ 
sumOfPolynomialNumberOf States [doubleConway , 4] ] ] 

Up to the level k = 4 the values of the specializations of the VSE-invariant of Conway, 
doubled and Kinoshita-Terasaka, doubled are the same: 

rii{douhleConway) = o{-2Mo'^YZ + o{3 + 2MYZ -2Z^) + 2{-l + Z^)) = r]i{doubleKT), 
ri2{doubleConway) = -{l/2)o{o'^{5 + AMY Z - 5Z^) - (-5 + AMYZ - Z^){-1 + Z^) + 
o(-2 + Z2 - Z^ + AMYZ{-2 + Z^))) = r]2{doubleKT), 

r]3{doubleConway) = l/Ao{{-l + Z^){-9 + 2QMYZ-AZ^-6MYZ^ + Z'^)-2o\5-5Z^ + 
MY{Z + 3Z^)) + o(5 - 5^2 + 5Z^ - Z^ + 2MYZ{U - 13Z^ + 3Z^))) = r]3{doubleKT), 
T]i{doubleConway) = -{l/32)o{Ao\5 + AMYZ-5Z^){l + 3Z^) + {-l + Z^){-53 + lQ7Z^- 
23Z^ + 5Z6 - 8MYZ{31 - 16Z^ + 5Z^)) + o(-105 + 180Z^ - 130Z^ + 28Z^ - hZ^ + 
8MYZ{-33 + 41^2 - 2\Z^ + SZ^))) = r]4{doubleKT). 

The computations for the doubled of Kinoshita-Terasaka knot follow similar lines. 

4.5 Links Tis and 75*14 

Consider the link T15, depicted in Fig Hi] which is the first example of [lO], writhe normal- 
ized to at each component. The bracket polynomial of this link is equal to the bracket 
polynomial of the unlink: both are equal to o. Up to the level k = 4, the VSE-invariant 
does not distinguishes T15 from the unhnk. The values of rji{Ti^) are all equal to o^, for 
i = 1,2,3,4. 
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Kinoshita-Terasaka knot 
doubled 




Picture based on Knotilus K11n42, writhe -1 
Figure 10: Kinoshita-Terasaka knot, doubled 



Consider also the link JSu in Fig. [12] based on a picture obtained from [3]. The 
bracket polynomial of this link is, once more, equal to the bracket polynomial of the 
unlink. 

Here is a session of Mathematica computing, from Fig. [121 the invariants t/i, 772, ^3, ^4 
for the link 75*14. 

(* Crossing encoding for $JS_-[14}$ *) 

pi = Xl[13, 20, 14, 1] X2[25, 1, 24, 2] Xl[38, 2, 37, 3] 

Xl[3, 35, 4, 34] X2[4, 22, 5, 21]; 

p2 = Xl[5, 7, 6, 6] Xl[7, 9, 8, 8] Xl[9, 11, 10, 10] 

Xl[ll, 18, 12, 19] Xl[20, 13, 19, 12]; 

p3 = Xl[24, 14, 23, 15] X2[37, 15, 36, 16] X2[16, 36, 17, 35] 

Xl[17, 23, 18, 22] X2[40, 34, 21, 33]; 

p4 = X2[33, 39, 32, 40] X2[38, 32, 39, 31] X2[30, 29, 31, 30] 

X2[28, 27, 29, 28] X2[26, 25, 27, 26]; 
JSAsProduct = pi p2 p3 p4; 
JS = new [Link, JSAsProduct] ; 
\etalJS = 
Simplify [\etal [sumOfPolynomialNumberOf States [ JS , 1] ] ] 
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Thistlewaite's link 

Figure 11: Jones and VSE- invariant do not distinguish T15 from the unhnk 



\eta2JS = 

Simplify [\eta2 [sumOfPolynomialNumberOf States [ JS , 2] ] ] 
\eta3JS = 

Simplify [\eta3 [sumOfPolynomialNumberOf States [JS , 3] ] ] 
\eta3JS = 

Simplify [\eta4 [sumOfPolynomialNumberOf States [ JS , 4] ] ] 

Computations yield 

r]2{JS) = o (16 (Z^ - 1) o^ + (16^2 - 15) o - 32 {Z^ - l)) , 

r]3{JS) = o (16 (Z^ - 1) o^ + (16Z^ - 15) o - 32 {Z^ - l)) , 

7]4iJS) = 0(0'' + 1024^2(1 - 2Z^)\Z^ - 1)0^ + 1024^2(1 - 2Zy{Z^ - l)o- 

2048Z^{1-2ZY{Z^ - 1)). 

Therefore 75*14 is distinguished from the unlink with two components and from T15 
at the k = 2 specialization! This specialization has only 801 states as compared with the 
2^0 = 1,048,576 states of the Jones polynomial and the 3^° = 3,486,784,401 states of 
the full VS&invariant. 



5 Conclusion and further research along these lines 

I have introduced a new regular isotopy invariant, the VSE-invariant which is a general- 
ization of the Jones invariant (equivalent to Kauffman's bracket). The VSE-invariant is 
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Figure 12: Link JSu proves that the VSE-invariant is stronger than Jones' 

the normal form, rjoo, of an class of polynomials p G TZ/Ioo-, where TZ is the ring 

and Too is an ideal generated by 27 polynomials. The polynomial p is computed directly 
from a diagram for the link: it is a state sum based on a virtual, shaded, exterior expansion 
(VSE-expansion) of the link diagram. 

The scheme admits an infinite sequence of specializations based on the normal forms, 
r^fc, k=l,2,. . . . These are normal forms relative to a fixed Grobner basis of the class of 
polynomials in T^/X^, where X^ = (Xqo U M^^^). Each 77^ induces a specialization of the 
VSE-invariant which is also a regular isotopy invariant. 

I have proved that VSE-invariant is a strict generalization of the bracket. For a fixed 
number of crossings n the number of states to compute rjk is a polynomial of degree 
k. The specialization can be useful even in the case k = 2, where the VSE-invariant 
distinguishes pairs of links not distinguishable by the bracket. At the low level k = 2,3 
the VSE-specialization can be computed obtaining useful invariants for links with hundred 
of crossings. 

The possibility to detect mutants via ?72-cabling failed for the Conway and Kinoshita- 
Terasaka knots at the level m = 2. But it might work for higher values of m. Testing this 
idea awaits for a proper implementation of ?72-cabling. 
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Variations of the strategy here introduced can generahze the VSE-invariant and be 
exported to obtain invariants of 3-nianifolds with a polynomial number of states along 
the combinatorial lines of [6] and [7]. These matters will be treated in future papers. 
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